home *** CD-ROM | disk | FTP | other *** search
Modula Definition | 1991-02-09 | 593 b | 25 lines |
- (*%F _fdata *)
- (*# call(seg_name => null) *)
- (*%E *)
- (*# module(implementation=>on) *)
- (*# module(init_code=>on) *)
- (*# data(seg_name => null) *)
- (*# call(o_a_copy => off) *)
- (*# check(stack=>off,
- index=>off,
- range=>off,
- overflow=>off,
- nil_ptr=>off) *)
- DEFINITION MODULE Com;
-
- (* NOTE: THIS IS AN ABRIDGED VERSION OF COM TO DEFINE PROCEDURES *)
- (* USED IN FILE TRANSFER PROTOCOLS *)
-
- PROCEDURE commChar(): BOOLEAN;
- (* TRUE IF character is waiting *)
-
- PROCEDURE SendBreak;
- (* Sends a break *)
-
- END Com.
-